% Zoom script
% Purpose
function run_zoom(input_folder)
%% Variables loading
load normsh;
load nnsh;
%% Go over the notyet folder
ny_folder = dir(input_folder);
ny_folder = ny_folder(3:end);

%% Run the autozoom function
for i = 1:length(ny_folder)
    filepath = fullfile(input_folder,ny_folder(i).name);
    I = imread(filepath);
    zoomed_image = autozoom(I,normsh,nnsh);
    imwrite(zoomed_image,filepath,'JPEG');
end
end